PC Home 109/PC Home 109.iso/data1.cab/Program_Files/be003.dxr/00045.ls

Text File | 2001-03-02 | 355 b | 18 lines

on exitFrame
  go(the frame)
  set LastTick to the ticks
  repeat while the locH of sprite 4 > 280
    set x to 2 * (the ticks - LastTick)
    set LastTick to the ticks
    set the locH of sprite 4 to the locH of sprite 4 - x
    updateStage()
  end repeat
  if the locH of sprite 4 <= 280 then
    go(the frame + 1)
  end if
end

on mouseUp
  go(75)
end